sHelp
                                     WL.REF.SOURCE
       2
   ref.source
     referral.source.abs.tape.codes

 Ì       2
ref.source    (main) 
[mnemonic]
\Z.CUS.WRS[wrs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 wrs                                                         
 active                       1 YN       L                 \Z.CUS.WRS[wrs]|0                                           
 exclude.from.qm08            1 YN       L                 \Z.CUS.WRS[wrs]|6                                           
 initiator                   10 CHOICE   L                 \Z.CUS.WRS[wrs]|2                                           
 last.update                 10 PINT     R                 \Z.CUS.WRS[wrs]UPD                                          
 name                        30 FREE     L                 \Z.CUS.WRS[wrs]|1                                           
 purchaser                   10 FREE     L  MIS.INS.DICT   \Z.CUS.WRS[wrs]|5                                       
 visit.type                   1 CHOICE   L                 \Z.CUS.WRS[wrs]|3                                           
 written.gp.referral          1 YN       L                 \Z.CUS.WRS[wrs]|4                                           

 Ì   €�     2
referral.source.abs.tape.codes    (abs.tape.codes) 
[mnemonic, abs.tape.svc]
\Z.CUS.WRS[wrs]A[gsc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 abs.tape.svc                10 FREE     L  MIS.ABS.TAPE   gsc                                                     
 abs.tape.code                8 FREE     L                 \Z.CUS.WRS[wrs]A[gsc]|0